R generation

https://rss.onlinelibrary.wiley.com/doi/10.1111/j.1740-9713.2018.01169.x

1 R yükleme

http://www.youtube.com/watch?v=XcBLEVknqvY

1.1 R-project

https://cran.r-project.org/

1.2 RStudio

https://www.rstudio.com/

https://www.rstudio.com/products/rstudio/download/

https://moderndive.com/2-getting-started.html

1.2.1 RStudio eklentileri

Discover and install useful RStudio addins

https://cran.r-project.org/web/packages/addinslist/README.html

https://rstudio.github.io/rstudioaddins/

# devtools::install_github("rstudio/addinexamples", type = "source")

1.3 X11

https://www.xquartz.org/

1.4 Java OS

https://support.apple.com/kb/dl1572

2 R zor şeyler için kolay, kolay şeyler için zor

R makes easy things hard, and hard things easy
Aynı şeyi çok fazla şekilde yapmak mümkün

R Syntax Comparison::CHEAT SHEET

https://www.amelia.mn/Syntax-cheatsheet.pdf

#RStats — There are always several ways to do the same thing… nice example on with the identity matrix by @TeaStats https://t.co/O3GXdPiM32
— Colin Fay 🤘 (@_ColinFay) April 1, 2019

3 R paketleri

3.1 Neden paketler var

I love the #rstats community.
Someone is like, “oh hey peeps, I saw a big need for this mundane but difficult task that I infrequently do, so I created a package that will literally scrape the last bits of peanut butter out of the jar for you. It's called pbplyr.”
What a tribe.
— Frank Elavsky ᴰᵃᵗᵃ ᵂᶦᶻᵃʳᵈ (@Frankly_Data) July 3, 2018

https://blog.mitchelloharawild.com/blog/user-2018-feature-wall/

3.2 Paketleri nereden bulabiliriz

Available CRAN Packages By Name
https://cran.r-project.org/web/packages/available_packages_by_name.html
CRAN Task Views
https://cran.r-project.org/web/views/
Bioconductor
https://www.bioconductor.org
RecommendR
http://recommendr.info/
pkgsearch
CRAN package search
https://github.com/metacran/pkgsearch
CRANsearcher
https://github.com/RhoInc/CRANsearcher
Awesome R
https://awesome-r.com/

3.3 Kendi paket evrenini oluştur

pkgverse: Build a Meta-Package Universe
https://cran.r-project.org/web/packages/pkgverse/index.html

3.4 R paket yükleme

install.packages("tidyverse", dependencies = TRUE)
install.packages("jmv", dependencies = TRUE)
install.packages("questionr", dependencies = TRUE)
install.packages("Rcmdr", dependencies = TRUE)
install.packages("summarytools")

# install.packages("tidyverse", dependencies = TRUE)
# install.packages("jmv", dependencies = TRUE)
# install.packages("questionr", dependencies = TRUE)
# install.packages("Rcmdr", dependencies = TRUE)
# install.packages("summarytools")

# require(tidyverse)
# require(jmv)
# require(questionr)
# library(summarytools)
# library(gganimate)

4 R için yardım bulma

# ?mean
# ??efetch
# help(merge)
# example(merge)

Vignette

RDocumentation https://www.rdocumentation.org
R Package Documentation https://rdrr.io/
GitHub
Stackoverflow

https://stackoverflow.com/

Google uygun anahtar kelime

How I use #rstats
h/t @ThePracticalDev pic.twitter.com/erRnTG0Ujr
— Emily Bovee (@ebovee09) August 10, 2018

Google’da ararken [R] yazmak da işe yarayabiliyor.

searcher package 📦

Awesome Cheatsheet https://github.com/detailyang/awesome-cheatsheet

http://cran.r-project.org/doc/contrib/Baggott-refcard-v2.pdf

https://www.rstudio.com/resources/cheatsheets/

Awesome R

https://github.com/qinwf/awesome-R#readme

https://awesome-r.com/

Twitter

https://twitter.com/hashtag/rstats?src=hash

Reproducible Examples

Got a question to ask on @SlackHQ or post on @github? No time to read the long post on how to use reprex? Here is a 20-second gif for you to format your R codes nicely and for others to reproduce your problem. (An example from a talk given by @JennyBryan) #rstat pic.twitter.com/gpuGXpFIsX
— ZhiYang (@zhiiiyang) October 18, 2018

Keeping up to date with R news
https://masalmon.eu/2019/01/25/uptodate/

5 R studio ile proje oluşturma

https://support.rstudio.com/hc/en-us/articles/200526207-Using-Projects

6 RStudio ile veri yükleme

https://support.rstudio.com/hc/en-us/articles/218611977-Importing-Data-with-RStudio

6.1 Excel

6.2 SPSS

6.3 csv

7 Veriyi görüntüleme

Spreadsheet users using #rstats: where's the data?#rstats users using spreadsheets: where's the code?
— Leonard Kiefer (@lenkiefer) July 7, 2018

# library(nycflights13)
# summary(flights)

View(data)

data

head

tail

glimpse

str

skimr::skim()

8 Veriyi değiştirme

8.1 Veriyi kod ile değiştirelim

8.2 Veriyi eklentilerle değiştirme

8.3 RStudio aracılığıyla recode

questionr paketi kullanılacak

https://juba.github.io/questionr/articles/recoding_addins.html

9 Basit tanımlayıcı istatistikler

summary()

mean

median

min

max

sd

table()

library(readr)
irisdata <- read_csv("data/iris.csv")

Parsed with column specification:
cols(
  Sepal.Length = [32mcol_double()[39m,
  Sepal.Width = [32mcol_double()[39m,
  Petal.Length = [32mcol_double()[39m,
  Petal.Width = [32mcol_double()[39m,
  Species = [31mcol_character()[39m
)

jmv::descriptives(
    data = irisdata,
    vars = "Sepal.Length",
    splitBy = "Species",
    freq = TRUE,
    hist = TRUE,
    dens = TRUE,
    bar = TRUE,
    box = TRUE,
    violin = TRUE,
    dot = TRUE,
    mode = TRUE,
    sum = TRUE,
    sd = TRUE,
    variance = TRUE,
    range = TRUE,
    se = TRUE,
    skew = TRUE,
    kurt = TRUE,
    quart = TRUE,
    pcEqGr = TRUE)


 DESCRIPTIVES

 Descriptives                                          
 ───────────────────────────────────────────────────── 
                          Species       Sepal.Length   
 ───────────────────────────────────────────────────── 
   N                      setosa                  50   
                          versicolor              50   
                          virginica               50   
   Missing                setosa                   0   
                          versicolor               0   
                          virginica                0   
   Mean                   setosa                5.01   
                          versicolor            5.94   
                          virginica             6.59   
   Std. error mean        setosa              0.0498   
                          versicolor          0.0730   
                          virginica           0.0899   
   Median                 setosa                5.00   
                          versicolor            5.90   
                          virginica             6.50   
   Mode                   setosa                5.00   
                          versicolor            5.50   
                          virginica             6.30   
   Sum                    setosa                 250   
                          versicolor             297   
                          virginica              329   
   Standard deviation     setosa               0.352   
                          versicolor           0.516   
                          virginica            0.636   
   Variance               setosa               0.124   
                          versicolor           0.266   
                          virginica            0.404   
   Range                  setosa                1.50   
                          versicolor            2.10   
                          virginica             3.00   
   Minimum                setosa                4.30   
                          versicolor            4.90   
                          virginica             4.90   
   Maximum                setosa                5.80   
                          versicolor            7.00   
                          virginica             7.90   
   Skewness               setosa               0.120   
                          versicolor           0.105   
                          virginica            0.118   
   Std. error skewness    setosa               0.337   
                          versicolor           0.337   
                          virginica            0.337   
   Kurtosis               setosa              -0.253   
                          versicolor          -0.533   
                          virginica           0.0329   
   Std. error kurtosis    setosa               0.662   
                          versicolor           0.662   
                          virginica            0.662   
   25th percentile        setosa                4.80   
                          versicolor            5.60   
                          virginica             6.23   
   50th percentile        setosa                5.00   
                          versicolor            5.90   
                          virginica             6.50   
   75th percentile        setosa                5.20   
                          versicolor            6.30   
                          virginica             6.90   
 ─────────────────────────────────────────────────────

# install.packages("scatr")

scatr::scat(
    data = irisdata,
    x = "Sepal.Length",
    y = "Sepal.Width",
    group = "Species",
    marg = "dens",
    line = "linear",
    se = TRUE)

9.1 summarytools

https://cran.r-project.org/web/packages/summarytools/vignettes/Introduction.html

library(summarytools)
summarytools::freq(iris$Species, style = "rmarkdown")

9.1.1 Frequencies

9.1.1.1 iris$Species

Type: Factor

	Freq	% Valid	% Valid Cum.	% Total	% Total Cum.
setosa	50	33.33	33.33	33.33	33.33
versicolor	50	33.33	66.67	33.33	66.67
virginica	50	33.33	100.00	33.33	100.00
<NA>	0			0.00	100.00
Total	150	100.00	100.00	100.00	100.00

summarytools::freq(iris$Species, report.nas = FALSE, style = "rmarkdown", omit.headings = TRUE)

‘omit.headings’ argument has been replaced by ‘headings’; setting headings = FALSE

	Freq	%	% Cum.
setosa	50	33.33	33.33
versicolor	50	33.33	66.67
virginica	50	33.33	100.00
Total	150	100.00	100.00

with(tobacco, print(ctable(smoker, diseased), method = 'render'))

Cross-Tabulation, Row Proportions

smoker * diseased

Data Frame: tobacco

	diseased
smoker	Yes				No				Total
Yes	125	(	41.9%	)	173	(	58.1%	)	298	(	100.0%	)
No	99	(	14.1%	)	603	(	85.9%	)	702	(	100.0%	)
Total	224	(	22.4%	)	776	(	77.6%	)	1000	(	100.0%	)

Generated by summarytools 0.9.3 (R version 3.5.3)
2019-04-18

with(tobacco, 
     print(ctable(smoker, diseased, prop = 'n', totals = FALSE), 
           omit.headings = TRUE, method = "render"))

‘omit.headings’ will disappear in future releases; use ‘headings’ instead

	diseased
smoker	Yes	No
Yes	125	173
No	99	603

Generated by summarytools 0.9.3 (R version 3.5.3)
2019-04-18

summarytools::descr(iris, style = "rmarkdown")

Non-numerical variable(s) ignored: Species ### Descriptive Statistics
#### iris
N: 150

	Petal.Length	Petal.Width	Sepal.Length	Sepal.Width
Mean	3.76	1.20	5.84	3.06
Std.Dev	1.77	0.76	0.83	0.44
Min	1.00	0.10	4.30	2.00
Q1	1.60	0.30	5.10	2.80
Median	4.35	1.30	5.80	3.00
Q3	5.10	1.80	6.40	3.30
Max	6.90	2.50	7.90	4.40
MAD	1.85	1.04	1.04	0.44
IQR	3.50	1.50	1.30	0.50
CV	0.47	0.64	0.14	0.14
Skewness	-0.27	-0.10	0.31	0.31
SE.Skewness	0.20	0.20	0.20	0.20
Kurtosis	-1.42	-1.36	-0.61	0.14
N.Valid	150.00	150.00	150.00	150.00
Pct.Valid	100.00	100.00	100.00	100.00

descr(iris, stats = c("mean", "sd", "min", "med", "max"), transpose = TRUE, 
      omit.headings = TRUE, style = "rmarkdown")

‘omit.headings’ argument has been replaced by ‘headings’; setting headings = FALSE Non-numerical variable(s) ignored: Species

	Mean	Std.Dev	Min	Median	Max
Petal.Length	3.76	1.77	1.00	4.35	6.90
Petal.Width	1.20	0.76	0.10	1.30	2.50
Sepal.Length	5.84	0.83	4.30	5.80	7.90
Sepal.Width	3.06	0.44	2.00	3.00	4.40

# view(dfSummary(iris))

dfSummary(tobacco, plain.ascii = FALSE, style = "grid")

text graphs are displayed; set ‘tmp.img.dir’ parameter to activate png graphs NAs introduced by coercion### Data Frame Summary
#### tobacco
Dimensions: 1000 x 9
Duplicates: 2

No	Variable	Stats / Values	Freqs (% of Valid)	Graph	Valid	Missing
1	gender [factor]	1. F 2. M	489 (50.0%) 489 (50.0%)	IIIIIIIIII IIIIIIIIII	978 (97.8%)	22 (2.2%)
2	age [numeric]	Mean (sd) : 49.6 (18.3) min < med < max: 18 < 50 < 80 IQR (CV) : 32 (0.4)	63 distinct values	. . . . . : : : : : : . : : : : : : : : : : : : : : : : : : : : : : : : : : : : : : : : : :	975 (97.5%)	25 (2.5%)
3	age.gr [factor]	1. 18-34 2. 35-50 3. 51-70 4. 71 +	258 (26.5%) 241 (24.7%) 317 (32.5%) 159 (16.3%)	IIIII IIII IIIIII III	975 (97.5%)	25 (2.5%)
4	BMI [numeric]	Mean (sd) : 25.7 (4.5) min < med < max: 8.8 < 25.6 < 39.4 IQR (CV) : 5.7 (0.2)	974 distinct values	: : : : : : : : : : : : . : : : : : .	974 (97.4%)	26 (2.6%)
5	smoker [factor]	1. Yes 2. No	298 (29.8%) 702 (70.2%)	IIIII IIIIIIIIIIIIII	1000 (100%)	0 (0%)
6	cigs.per.day [numeric]	Mean (sd) : 6.8 (11.9) min < med < max: 0 < 0 < 40 IQR (CV) : 11 (1.8)	37 distinct values	: : : : : . . . . . .	965 (96.5%)	35 (3.5%)
7	diseased [factor]	1. Yes 2. No	224 (22.4%) 776 (77.6%)	IIII IIIIIIIIIIIIIII	1000 (100%)	0 (0%)
8	disease [character]	1. Hypertension 2. Cancer 3. Cholesterol 4. Heart 5. Pulmonary 6. Musculoskeletal 7. Diabetes 8. Hearing 9. Digestive 10. Hypotension [ 3 others ]	36 (16.2%) 34 (15.3%) 21 ( 9.5%) 20 ( 9.0%) 20 ( 9.0%) 19 ( 8.6%) 14 ( 6.3%) 14 ( 6.3%) 12 ( 5.4%) 11 ( 5.0%) 21 ( 9.5%)	III III I I I I I I I I	222 (22.2%)	778 (77.8%)
9	samp.wgts [numeric]	Mean (sd) : 1 (0.1) min < med < max: 0.9 < 1 < 1.1 IQR (CV) : 0.2 (0.1)	0.86!: 267 (26.7%) 1.04!: 249 (24.9%) 1.05!: 324 (32.4%) 1.06!: 160 (16.0%) ! rounded	IIIII IIII IIIIII III	1000 (100%)	0 (0%)


# First save the results

iris_stats_by_species <- by(data = iris, 
                            INDICES = iris$Species, 
                            FUN = descr, stats = c("mean", "sd", "min", "med", "max"), 
                            transpose = TRUE)

# Then use view(), like so:

view(iris_stats_by_species, method = "pander", style = "rmarkdown")

Non-numerical variable(s) ignored: Species ### Descriptive Statistics
#### iris
Group: Species = setosa
N: 50

	Mean	Std.Dev	Min	Median	Max
Petal.Length	1.46	0.17	1.00	1.50	1.90
Petal.Width	0.25	0.11	0.10	0.20	0.60
Sepal.Length	5.01	0.35	4.30	5.00	5.80
Sepal.Width	3.43	0.38	2.30	3.40	4.40

Group: Species = versicolor
N: 50

	Mean	Std.Dev	Min	Median	Max
Petal.Length	4.26	0.47	3.00	4.35	5.10
Petal.Width	1.33	0.20	1.00	1.30	1.80
Sepal.Length	5.94	0.52	4.90	5.90	7.00
Sepal.Width	2.77	0.31	2.00	2.80	3.40

Group: Species = virginica
N: 50

	Mean	Std.Dev	Min	Median	Max
Petal.Length	5.55	0.55	4.50	5.55	6.90
Petal.Width	2.03	0.27	1.40	2.00	2.50
Sepal.Length	6.59	0.64	4.90	6.50	7.90
Sepal.Width	2.97	0.32	2.20	3.00	3.80

# view(iris_stats_by_species)

data(tobacco) # tobacco is an example dataframe included in the package
BMI_by_age <- with(tobacco, 
                   by(BMI, age.gr, descr, 
                      stats = c("mean", "sd", "min", "med", "max")))
view(BMI_by_age, "pander", style = "rmarkdown")

9.1.2 Descriptive Statistics

9.1.2.1 BMI by age.gr

Data Frame: tobacco
N: 258

	18-34	35-50	51-70	71 +
Mean	23.84	25.11	26.91	27.45
Std.Dev	4.23	4.34	4.26	4.37
Min	8.83	10.35	9.01	16.36
Median	24.04	25.11	26.77	27.52
Max	34.84	39.44	39.21	38.37

BMI_by_age <- with(tobacco, 
                   by(BMI, age.gr, descr,  transpose = TRUE,
                      stats = c("mean", "sd", "min", "med", "max")))

view(BMI_by_age, "pander", style = "rmarkdown", omit.headings = TRUE)

‘omit.headings’ will disappear in future releases; use ‘headings’ instead

	Mean	Std.Dev	Min	Median	Max
18-34	23.84	4.23	8.83	24.04	34.84
35-50	25.11	4.34	10.35	25.11	39.44
51-70	26.91	4.26	9.01	26.77	39.21
71 +	27.45	4.37	16.36	27.52	38.37

tobacco_subset <- tobacco[ ,c("gender", "age.gr", "smoker")]
freq_tables <- lapply(tobacco_subset, freq)

# view(freq_tables, footnote = NA, file = 'freq-tables.html')

what.is(iris)

function ‘is’ appears not to be S3 generic; found functions that look like S3 methods‘>=’ not meaningful for factors$properties

$attributes.lengths names class row.names 5 1 150

$extensive.is [1] “is.data.frame” “is.list” “is.object”
[4] “is.recursive” “is.unsorted”

freq(tobacco$gender, style = 'rmarkdown')

### Frequencies  
#### tobacco$gender  
**Type:** Factor  

|     &nbsp; | Freq | % Valid | % Valid Cum. | % Total | % Total Cum. |
|-----------:|-----:|--------:|-------------:|--------:|-------------:|
|      **F** |  489 |   50.00 |        50.00 |   48.90 |        48.90 |
|      **M** |  489 |   50.00 |       100.00 |   48.90 |        97.80 |
| **\<NA\>** |   22 |         |              |    2.20 |       100.00 |
|  **Total** | 1000 |  100.00 |       100.00 |  100.00 |       100.00 |

print(freq(tobacco$gender), method = 'render')

Frequencies

tobacco$gender

Type: Factor

		Valid		Total
gender	Freq	%	% Cum.	%	% Cum.
F	489	50.00	50.00	48.90	48.90
M	489	50.00	100.00	48.90	97.80
<NA>	22			2.20	100.00
Total	1000	100.00	100.00	100.00	100.00

Generated by summarytools 0.9.3 (R version 3.5.3)
2019-04-18

9.2 skimr

library(skimr)
skim(df)

9.3 DataExplorer

library(DataExplorer)
DataExplorer::create_report(df)

9.4 Grafikler

# library(ggplot2)
# library(mosaic)
# mPlot(irisdata)

ctable(tobacco$gender, tobacco$smoker, style = 'rmarkdown')

9.4.1 Cross-Tabulation, Row Proportions

9.4.1.1 gender * smoker

Data Frame: tobacco

	smoker	Yes	No	Total
gender
F		147 (30.1%)	342 (69.9%)	489 (100.0%)
M		143 (29.2%)	346 (70.8%)	489 (100.0%)
<NA>		8 (36.4%)	14 (63.6%)	22 (100.0%)
Total		298 (29.8%)	702 (70.2%)	1000 (100.0%)

print(ctable(tobacco$gender, tobacco$smoker), method = 'render')

Cross-Tabulation, Row Proportions

gender * smoker

Data Frame: tobacco

	smoker
gender	Yes				No				Total
F	147	(	30.1%	)	342	(	69.9%	)	489	(	100.0%	)
M	143	(	29.2%	)	346	(	70.8%	)	489	(	100.0%	)
<NA>	8	(	36.4%	)	14	(	63.6%	)	22	(	100.0%	)
Total	298	(	29.8%	)	702	(	70.2%	)	1000	(	100.0%	)

Generated by summarytools 0.9.3 (R version 3.5.3)
2019-04-18

descr(tobacco, style = 'rmarkdown')

print(descr(tobacco), method = 'render', table.classes = 'st-small')

dfSummary(tobacco, style = 'grid', plain.ascii = FALSE)

print(dfSummary(tobacco, graph.magnif = 0.75), method = 'render')

Here, building up a #ggplot2 as slowly as possible, #rstats. Incremental adjustments. #rstatsteachingideas pic.twitter.com/nUulQl8bPh
— Gina Reynolds (@EvaMaeRey) August 13, 2018

Dreaming of a fancy #Rstats #ggplot #dataviz but still scared of typing #code? @_pvictorr esquisse package has you covered https://t.co/1vIDXcVAAF pic.twitter.com/RlTkptnrNv
— Radoslaw Panczak (@RPanczak) October 2, 2018

9.5 Tablolar

10 Bazı arayüzler

Link

10.1 Rcmdr

library(Rcmdr)

Rcmdr::Commander()

A Comparative Review of the R Commander GUI for R

http://r4stats.com/articles/software-reviews/r-commander/

10.2 jamovi

https://www.jamovi.org/

https://blog.jamovi.org/2018/07/30/rj.html

11 R nereden öğrenilir

12 Sonraki Konular

RStudio ile GitHub
Hipotez testleri
R Markdown ve R Notebook ile tekrarlanabilir rapor

13 Geri Bildirim

Geri bildirim için tıklayınız: Geri bildirim formu

# Save Final Data

saved data after analysis to `Data-After-Analysis.xlsx`.

saveRDS(mydata, "Data-After-Analysis.rds")

writexl::write_xlsx(mydata, "Data-After-Analysis.xlsx")

file.info("Data-After-Analysis.xlsx")$ctime

14 Libraries Used

citation()

citation("tidyverse")
citation("foreign")
citation("tidylog")
citation("janitor")
citation("jmv")
citation("tangram")
citation("finalfit")
citation("summarytools")
citation("ggstatplot")
citation("readxl")

report::cite_packages(session = sessionInfo())

sessionInfo()

15 Notes

Completed on 2019-04-20 10:50:57.

Serdar Balci, MD, Pathologist
d rserdarbalci@gmail.com
https://rpubs.com/sbalci/CV

https://sbalci.github.io/
https://github.com/sbalci
—

Bu bir derlemedir, mümkün mertebe alıntılara referans vermeye çalıştım.↩

LS0tCnRpdGxlOiBSIGlsZSBhbmFsaXplIGJhxZ9sYXJrZW5eW0J1IGJpciBkZXJsZW1lZGlyLCBtw7xta8O8biBtZXJ0ZWJlIGFsxLFudMSxbGFyYSByZWZlcmFucwogIHZlcm1leWUgw6dhbMSxxZ90xLFtLl0KYXV0aG9yOiAiRGVybGV5ZW4gW1NlcmRhciBCYWxjxLEsIE1ELCBQYXRob2xvZ2lzdF0oaHR0cHM6Ly9zYmFsY2kuZ2l0aHViLmlvLykiCmRhdGU6ICJgciBmb3JtYXQoU3lzLkRhdGUoKSlgIgpvdXRwdXQ6CiAgaHRtbF9ub3RlYm9vazoKICAgIGZpZ19jYXB0aW9uOiB5ZXMKICAgIGhpZ2hsaWdodDoga2F0ZQogICAgbnVtYmVyX3NlY3Rpb25zOiB5ZXMKICAgIHRoZW1lOiBmbGF0bHkKICAgIHRvYzogeWVzCiAgICB0b2NfZGVwdGg6IDUKICAgIHRvY19mbG9hdDogeWVzCiAgcGRmX2RvY3VtZW50OgogICAgdG9jOiB5ZXMKICAgIHRvY19kZXB0aDogJzUnCiAgaHRtbF9kb2N1bWVudDogCiAgICBmaWdfY2FwdGlvbjogeWVzCiAgICBrZWVwX21kOiB5ZXMKICAgIHRvYzogeWVzCiAgICB0b2NfZGVwdGg6IDUKICAgIHRvY19mbG9hdDogeWVzCi0tLQoKPCEtLSBPcGVuIGFsbCBsaW5rcyBpbiBuZXcgdGFiLS0+ICAKPGJhc2UgdGFyZ2V0PSJfYmxhbmsiLz4gICAKCgo8IS0tIEdvIHRvIHd3dy5hZGR0aGlzLmNvbS9kYXNoYm9hcmQgdG8gY3VzdG9taXplIHlvdXIgdG9vbHMgLS0+IDxzY3JpcHQgdHlwZT0idGV4dC9qYXZhc2NyaXB0IiBzcmM9Ii8vczcuYWRkdGhpcy5jb20vanMvMzAwL2FkZHRoaXNfd2lkZ2V0LmpzI3B1YmlkPXJhLTViYzM2OTAwYTQwNTA5MGIiPiAgCjwvc2NyaXB0PiAKCgoKClshW10oaHR0cDovL3Jlcy5jbG91ZGluYXJ5LmNvbS9keWQ5MTFrbWgvaW1hZ2UvdXBsb2FkL2ZfYXV0byxxX2F1dG86YmVzdC92MTUzMDExMzA3Ny9JbWFnZV8yX3ZmeTQ4Yi5wbmcpXShodHRwczovL3d3dy5kYXRhY2FtcC5jb20vY29tbXVuaXR5L3R1dG9yaWFscy9kYXRhLXNjaWVuY2UtcGl0ZmFsbHMpCgoKLSBSIGdlbmVyYXRpb24KCmh0dHBzOi8vcnNzLm9ubGluZWxpYnJhcnkud2lsZXkuY29tL2RvaS8xMC4xMTExL2ouMTc0MC05NzEzLjIwMTguMDExNjkueAoKCiMgUiB5w7xrbGVtZQoKaHR0cDovL3d3dy55b3V0dWJlLmNvbS93YXRjaD92PVhjQkxFVmtucXZZCgpbIVtXaGF0IGlzIFI/XShodHRwOi8vaW1nLnlvdXR1YmUuY29tL3ZpL1hjQkxFVmtucXZZLzAuanBnKV0oaHR0cDovL3d3dy55b3V0dWJlLmNvbS93YXRjaD92PVhjQkxFVmtucXZZKQoKCiMjIFItcHJvamVjdAoKaHR0cHM6Ly9jcmFuLnItcHJvamVjdC5vcmcvCgotLS0KClshW10oaHR0cHM6Ly9pc21heWMuZ2l0aHViLmlvL3RhbGtzL25lc3MtaW5mZXIvaW1nL2VuZ2luZS5wbmcpXShodHRwczovL2lzbWF5Yy5naXRodWIuaW8vdGFsa3MvbmVzcy1pbmZlci9zbGlkZV9kZWNrLmh0bWwjNikKCi0tLQoKIyMgUlN0dWRpbwoKaHR0cHM6Ly93d3cucnN0dWRpby5jb20vCgpodHRwczovL3d3dy5yc3R1ZGlvLmNvbS9wcm9kdWN0cy9yc3R1ZGlvL2Rvd25sb2FkLwoKaHR0cHM6Ly9tb2Rlcm5kaXZlLmNvbS8yLWdldHRpbmctc3RhcnRlZC5odG1sCgotLS0KClshW10oaHR0cDovL3d3dy11c2Vycy55b3JrLmFjLnVrL35lcjEzL1JTdHVkaW8lMjBBbmF0b215LnN2ZyldKGh0dHBzOi8vYnV6enJiZWVsaW5lLmJsb2cvMjAxOC8wNy8wNC9yc3R1ZGlvLWFuYXRvbXkvKQoKCgotLS0KCiMjIyBSU3R1ZGlvIGVrbGVudGlsZXJpCgotIERpc2NvdmVyIGFuZCBpbnN0YWxsIHVzZWZ1bCBSU3R1ZGlvIGFkZGlucwoKaHR0cHM6Ly9jcmFuLnItcHJvamVjdC5vcmcvd2ViL3BhY2thZ2VzL2FkZGluc2xpc3QvUkVBRE1FLmh0bWwKCmh0dHBzOi8vcnN0dWRpby5naXRodWIuaW8vcnN0dWRpb2FkZGlucy8KCgpgYGB7cn0KIyBkZXZ0b29sczo6aW5zdGFsbF9naXRodWIoInJzdHVkaW8vYWRkaW5leGFtcGxlcyIsIHR5cGUgPSAic291cmNlIikKYGBgCgoKLS0tCgojIyBYMTEKCmh0dHBzOi8vd3d3LnhxdWFydHoub3JnLwoKLS0tCgojIyBKYXZhIE9TCgpodHRwczovL3N1cHBvcnQuYXBwbGUuY29tL2tiL2RsMTU3MgoKLS0tCgoKIyBSIHpvciDFn2V5bGVyIGnDp2luIGtvbGF5LCBrb2xheSDFn2V5bGVyIGnDp2luIHpvcgoKCi0gW1IgbWFrZXMgZWFzeSB0aGluZ3MgaGFyZCwgYW5kIGhhcmQgdGhpbmdzIGVhc3ldKGh0dHA6Ly9yNHN0YXRzLmNvbS9hcnRpY2xlcy93aHktci1pcy1oYXJkLXRvLWxlYXJuLykKCgotIEF5bsSxIMWfZXlpIMOnb2sgZmF6bGEgxZ9la2lsZGUgeWFwbWFrIG3DvG1rw7xuCgpSIFN5bnRheCBDb21wYXJpc29uOjpDSEVBVCBTSEVFVAoKaHR0cHM6Ly93d3cuYW1lbGlhLm1uL1N5bnRheC1jaGVhdHNoZWV0LnBkZgoKCgoKPGJsb2NrcXVvdGUgY2xhc3M9InR3aXR0ZXItdHdlZXQiIGRhdGEtbGFuZz0iZW4iPjxwIGxhbmc9ImVuIiBkaXI9Imx0ciI+PGEgaHJlZj0iaHR0cHM6Ly90d2l0dGVyLmNvbS9oYXNodGFnL1JTdGF0cz9zcmM9aGFzaCZhbXA7cmVmX3NyYz10d3NyYyU1RXRmdyI+I1JTdGF0czwvYT4g4oCUIFRoZXJlIGFyZSBhbHdheXMgc2V2ZXJhbCB3YXlzIHRvIGRvIHRoZSBzYW1lIHRoaW5nLi4uIG5pY2UgZXhhbXBsZSBvbiB3aXRoIHRoZSBpZGVudGl0eSBtYXRyaXggYnkgPGEgaHJlZj0iaHR0cHM6Ly90d2l0dGVyLmNvbS9UZWFTdGF0cz9yZWZfc3JjPXR3c3JjJTVFdGZ3Ij5AVGVhU3RhdHM8L2E+IDxhIGhyZWY9Imh0dHBzOi8vdC5jby9PM0dYZFBpTTMyIj5odHRwczovL3QuY28vTzNHWGRQaU0zMjwvYT48L3A+Jm1kYXNoOyBDb2xpbiBGYXkg8J+kmCAoQF9Db2xpbkZheSkgPGEgaHJlZj0iaHR0cHM6Ly90d2l0dGVyLmNvbS9fQ29saW5GYXkvc3RhdHVzLzExMTI3NDY2MzM0Njc1MTg5Nzc/cmVmX3NyYz10d3NyYyU1RXRmdyI+QXByaWwgMSwgMjAxOTwvYT48L2Jsb2NrcXVvdGU+CjxzY3JpcHQgYXN5bmMgc3JjPSJodHRwczovL3BsYXRmb3JtLnR3aXR0ZXIuY29tL3dpZGdldHMuanMiIGNoYXJzZXQ9InV0Zi04Ij48L3NjcmlwdD4KCgoKCgoKCgoKCi0tLQoKCiMgUiBwYWtldGxlcmkKCgojIyBOZWRlbiBwYWtldGxlciB2YXIKClshW10oaHR0cHM6Ly9pc21heWMuZ2l0aHViLmlvL3RhbGtzL25lc3MtaW5mZXIvaW1nL2FwcHN0b3JlLnBuZyldKGh0dHBzOi8vaXNtYXljLmdpdGh1Yi5pby90YWxrcy9uZXNzLWluZmVyL3NsaWRlX2RlY2suaHRtbCM3KQoKLS0tCgo8c2NyaXB0IGFzeW5jIHNyYz0iaHR0cHM6Ly9wbGF0Zm9ybS50d2l0dGVyLmNvbS93aWRnZXRzLmpzIiBjaGFyc2V0PSJ1dGYtOCI+PC9zY3JpcHQ+PGJsb2NrcXVvdGUgY2xhc3M9InR3aXR0ZXItdHdlZXQiIGRhdGEtbGFuZz0iZW4iPjxwIGxhbmc9ImVuIiBkaXI9Imx0ciI+SSBsb3ZlIHRoZSA8YSBocmVmPSJodHRwczovL3R3aXR0ZXIuY29tL2hhc2h0YWcvcnN0YXRzP3NyYz1oYXNoJmFtcDtyZWZfc3JjPXR3c3JjJTVFdGZ3Ij4jcnN0YXRzPC9hPiBjb21tdW5pdHkuPGJyPlNvbWVvbmUgaXMgbGlrZSwgJnF1b3Q7b2ggaGV5IHBlZXBzLCBJIHNhdyBhIGJpZyBuZWVkIGZvciB0aGlzIG11bmRhbmUgYnV0IGRpZmZpY3VsdCB0YXNrIHRoYXQgSSBpbmZyZXF1ZW50bHkgZG8sIHNvIEkgY3JlYXRlZCBhIHBhY2thZ2UgdGhhdCB3aWxsIGxpdGVyYWxseSBzY3JhcGUgdGhlIGxhc3QgYml0cyBvZiBwZWFudXQgYnV0dGVyIG91dCBvZiB0aGUgamFyIGZvciB5b3UuIEl0JiMzOTtzIGNhbGxlZCBwYnBseXIuJnF1b3Q7PGJyPldoYXQgYSB0cmliZS48L3A+Jm1kYXNoOyBGcmFuayBFbGF2c2t5IOG0sOG1g+G1l+G1gyDhtYLhtqbhtrvhtYPKs+G1iCAoQEZyYW5rbHlfRGF0YSkgPGEgaHJlZj0iaHR0cHM6Ly90d2l0dGVyLmNvbS9GcmFua2x5X0RhdGEvc3RhdHVzLzEwMTQxODkwOTUyOTQyOTE5Njg/cmVmX3NyYz10d3NyYyU1RXRmdyI+SnVseSAzLCAyMDE4PC9hPjwvYmxvY2txdW90ZT4KCi0tLQoKCgpodHRwczovL2Jsb2cubWl0Y2hlbGxvaGFyYXdpbGQuY29tL2Jsb2cvdXNlci0yMDE4LWZlYXR1cmUtd2FsbC8KCi0tLQoKIVtdKGh0dHBzOi8vYmxvZy5taXRjaGVsbG9oYXJhd2lsZC5jb20vYmxvZy8yMDE4LTA3LTExLXVzZXItMjAxOC1mZWF0dXJlLXdhbGxfZmlsZXMvZmluYWwuanBnKQoKLS0tCgojIyBQYWtldGxlcmkgbmVyZWRlbiBidWxhYmlsaXJpegoKLSBBdmFpbGFibGUgQ1JBTiBQYWNrYWdlcyBCeSBOYW1lICAKaHR0cHM6Ly9jcmFuLnItcHJvamVjdC5vcmcvd2ViL3BhY2thZ2VzL2F2YWlsYWJsZV9wYWNrYWdlc19ieV9uYW1lLmh0bWwKCi0gQ1JBTiBUYXNrIFZpZXdzICAKaHR0cHM6Ly9jcmFuLnItcHJvamVjdC5vcmcvd2ViL3ZpZXdzLwoKLSBCaW9jb25kdWN0b3IgIApodHRwczovL3d3dy5iaW9jb25kdWN0b3Iub3JnCgotIFJlY29tbWVuZFIgIApodHRwOi8vcmVjb21tZW5kci5pbmZvLwoKLSBwa2dzZWFyY2ggIApDUkFOIHBhY2thZ2Ugc2VhcmNoICAKaHR0cHM6Ly9naXRodWIuY29tL21ldGFjcmFuL3BrZ3NlYXJjaAoKLSBDUkFOc2VhcmNoZXIgIApodHRwczovL2dpdGh1Yi5jb20vUmhvSW5jL0NSQU5zZWFyY2hlciAgCgotIEF3ZXNvbWUgUiAgCmh0dHBzOi8vYXdlc29tZS1yLmNvbS8gIAoKCiMjIEtlbmRpIHBha2V0IGV2cmVuaW5pIG9sdcWfdHVyCgotIHBrZ3ZlcnNlOiBCdWlsZCBhIE1ldGEtUGFja2FnZSBVbml2ZXJzZSAgCmh0dHBzOi8vY3Jhbi5yLXByb2plY3Qub3JnL3dlYi9wYWNrYWdlcy9wa2d2ZXJzZS9pbmRleC5odG1sCgoKLS0tCgojIyBSIHBha2V0IHnDvGtsZW1lCgpgYGAKaW5zdGFsbC5wYWNrYWdlcygidGlkeXZlcnNlIiwgZGVwZW5kZW5jaWVzID0gVFJVRSkKaW5zdGFsbC5wYWNrYWdlcygiam12IiwgZGVwZW5kZW5jaWVzID0gVFJVRSkKaW5zdGFsbC5wYWNrYWdlcygicXVlc3Rpb25yIiwgZGVwZW5kZW5jaWVzID0gVFJVRSkKaW5zdGFsbC5wYWNrYWdlcygiUmNtZHIiLCBkZXBlbmRlbmNpZXMgPSBUUlVFKQppbnN0YWxsLnBhY2thZ2VzKCJzdW1tYXJ5dG9vbHMiKQpgYGAKCmBgYHtyIHBha2V0IHnDvGtsZW1lfQojIGluc3RhbGwucGFja2FnZXMoInRpZHl2ZXJzZSIsIGRlcGVuZGVuY2llcyA9IFRSVUUpCiMgaW5zdGFsbC5wYWNrYWdlcygiam12IiwgZGVwZW5kZW5jaWVzID0gVFJVRSkKIyBpbnN0YWxsLnBhY2thZ2VzKCJxdWVzdGlvbnIiLCBkZXBlbmRlbmNpZXMgPSBUUlVFKQojIGluc3RhbGwucGFja2FnZXMoIlJjbWRyIiwgZGVwZW5kZW5jaWVzID0gVFJVRSkKIyBpbnN0YWxsLnBhY2thZ2VzKCJzdW1tYXJ5dG9vbHMiKQpgYGAKCgpgYGB7ciBwYWtldCBjYWdpcm1hLCBlcnJvcj1GQUxTRSwgbWVzc2FnZSA9IEZBTFNFLCB3YXJuaW5nID0gRkFMU0UsIGV2YWwgPSBUUlVFLCBpbmNsdWRlID0gVFJVRX0KIyByZXF1aXJlKHRpZHl2ZXJzZSkKIyByZXF1aXJlKGptdikKIyByZXF1aXJlKHF1ZXN0aW9ucikKIyBsaWJyYXJ5KHN1bW1hcnl0b29scykKIyBsaWJyYXJ5KGdnYW5pbWF0ZSkKYGBgCgoKCi0tLQoKIyBSIGnDp2luIHlhcmTEsW0gYnVsbWEKCgpgYGB7ciB5YXJkxLFtfQojID9tZWFuCiMgPz9lZmV0Y2gKIyBoZWxwKG1lcmdlKQojIGV4YW1wbGUobWVyZ2UpCmBgYAoKCgotIFZpZ25ldHRlCgohW10oZmlndXJlcy92aWduZXR0ZS5wbmcpCgotLS0KCi0gUkRvY3VtZW50YXRpb24KaHR0cHM6Ly93d3cucmRvY3VtZW50YXRpb24ub3JnCgotIFIgUGFja2FnZSBEb2N1bWVudGF0aW9uCmh0dHBzOi8vcmRyci5pby8KCi0gR2l0SHViCgotIFN0YWNrb3ZlcmZsb3cKCmh0dHBzOi8vc3RhY2tvdmVyZmxvdy5jb20vCgotIEdvb2dsZSB1eWd1biBhbmFodGFyIGtlbGltZQoKCgo8c2NyaXB0IGFzeW5jIHNyYz0iaHR0cHM6Ly9wbGF0Zm9ybS50d2l0dGVyLmNvbS93aWRnZXRzLmpzIiBjaGFyc2V0PSJ1dGYtOCI+PC9zY3JpcHQ+PGJsb2NrcXVvdGUgY2xhc3M9InR3aXR0ZXItdHdlZXQiIGRhdGEtbGFuZz0iZW4iPjxwIGxhbmc9ImVuIiBkaXI9Imx0ciI+SG93IEkgdXNlIDxhIGhyZWY9Imh0dHBzOi8vdHdpdHRlci5jb20vaGFzaHRhZy9yc3RhdHM/c3JjPWhhc2gmYW1wO3JlZl9zcmM9dHdzcmMlNUV0ZnciPiNyc3RhdHM8L2E+IDxicj5oL3QgPGEgaHJlZj0iaHR0cHM6Ly90d2l0dGVyLmNvbS9UaGVQcmFjdGljYWxEZXY/cmVmX3NyYz10d3NyYyU1RXRmdyI+QFRoZVByYWN0aWNhbERldjwvYT4gPGEgaHJlZj0iaHR0cHM6Ly90LmNvL2VyUm5URzBVanIiPnBpYy50d2l0dGVyLmNvbS9lclJuVEcwVWpyPC9hPjwvcD4mbWRhc2g7IEVtaWx5IEJvdmVlIChAZWJvdmVlMDkpIDxhIGhyZWY9Imh0dHBzOi8vdHdpdHRlci5jb20vZWJvdmVlMDkvc3RhdHVzLzEwMjgwMzc1OTQ5NDc0ODU2OTY/cmVmX3NyYz10d3NyYyU1RXRmdyI+QXVndXN0IDEwLCAyMDE4PC9hPjwvYmxvY2txdW90ZT4KCgotLS0KCgohW10oZmlndXJlcy9Hb29nbGUtcGFja2FnZS1uYW1lLnBuZykKCi0tLQoKCgohW10oZmlndXJlcy9Hb29nbGUtc3RhcnQtd2l0aC1SLnBuZykKCi0tLQoKLSBHb29nbGUnZGEgYXJhcmtlbiBgW1JdYCB5YXptYWsgZGEgacWfZSB5YXJheWFiaWxpeW9yLgoKCi0tLQoKLSBzZWFyY2hlciBwYWNrYWdlIPCfk6YKCgpbIVtdKGh0dHBzOi8vY2Ftby5naXRodWJ1c2VyY29udGVudC5jb20vMTJmMGUyZDE4MDQ3ZjFiNWYzNmZiZWIwOWExZDBlNTQ4MjM2ODgzZi82ODc0NzQ3MDczM2EyZjJmNjkyZTY5NmQ2Nzc1NzIyZTYzNmY2ZDJmNWE3MTMyNzI2NzM2NDcyZTY3Njk2NildKGh0dHBzOi8vZ2l0aHViLmNvbS9jb2F0bGVzcy9zZWFyY2hlcikKCgoKLS0tCgotIEF3ZXNvbWUgQ2hlYXRzaGVldApodHRwczovL2dpdGh1Yi5jb20vZGV0YWlseWFuZy9hd2Vzb21lLWNoZWF0c2hlZXQKCmh0dHA6Ly9jcmFuLnItcHJvamVjdC5vcmcvZG9jL2NvbnRyaWIvQmFnZ290dC1yZWZjYXJkLXYyLnBkZgoKaHR0cHM6Ly93d3cucnN0dWRpby5jb20vcmVzb3VyY2VzL2NoZWF0c2hlZXRzLwoKCi0gQXdlc29tZSBSCgpodHRwczovL2dpdGh1Yi5jb20vcWlud2YvYXdlc29tZS1SI3JlYWRtZQoKaHR0cHM6Ly9hd2Vzb21lLXIuY29tLwoKCgoKLSBUd2l0dGVyCgpodHRwczovL3R3aXR0ZXIuY29tL2hhc2h0YWcvcnN0YXRzP3NyYz1oYXNoCgoKLSBSZXByb2R1Y2libGUgRXhhbXBsZXMgIAoKPGJsb2NrcXVvdGUgY2xhc3M9InR3aXR0ZXItdHdlZXQiIGRhdGEtbGFuZz0iZW4iPjxwIGxhbmc9ImVuIiBkaXI9Imx0ciI+R290IGEgcXVlc3Rpb24gdG8gYXNrIG9uIDxhIGhyZWY9Imh0dHBzOi8vdHdpdHRlci5jb20vU2xhY2tIUT9yZWZfc3JjPXR3c3JjJTVFdGZ3Ij5AU2xhY2tIUTwvYT4gb3IgcG9zdCBvbiA8YSBocmVmPSJodHRwczovL3R3aXR0ZXIuY29tL2dpdGh1Yj9yZWZfc3JjPXR3c3JjJTVFdGZ3Ij5AZ2l0aHViPC9hPj8gTm8gdGltZSB0byByZWFkIHRoZSBsb25nIHBvc3Qgb24gaG93IHRvIHVzZSByZXByZXg/IEhlcmUgaXMgYSAyMC1zZWNvbmQgZ2lmIGZvciB5b3UgdG8gZm9ybWF0IHlvdXIgUiBjb2RlcyBuaWNlbHkgYW5kIGZvciBvdGhlcnMgdG8gcmVwcm9kdWNlIHlvdXIgcHJvYmxlbS4gKEFuIGV4YW1wbGUgZnJvbSBhIHRhbGsgZ2l2ZW4gYnkgPGEgaHJlZj0iaHR0cHM6Ly90d2l0dGVyLmNvbS9KZW5ueUJyeWFuP3JlZl9zcmM9dHdzcmMlNUV0ZnciPkBKZW5ueUJyeWFuPC9hPikgPGEgaHJlZj0iaHR0cHM6Ly90d2l0dGVyLmNvbS9oYXNodGFnL3JzdGF0P3NyYz1oYXNoJmFtcDtyZWZfc3JjPXR3c3JjJTVFdGZ3Ij4jcnN0YXQ8L2E+IDxhIGhyZWY9Imh0dHBzOi8vdC5jby9ncHVHWHBGSXNYIj5waWMudHdpdHRlci5jb20vZ3B1R1hwRklzWDwvYT48L3A+Jm1kYXNoOyBaaGlZYW5nIChAemhpaWl5YW5nKSA8YSBocmVmPSJodHRwczovL3R3aXR0ZXIuY29tL3poaWlpeWFuZy9zdGF0dXMvMTA1MzAwNjAwMzcxMTU2OTkyMD9yZWZfc3JjPXR3c3JjJTVFdGZ3Ij5PY3RvYmVyIDE4LCAyMDE4PC9hPjwvYmxvY2txdW90ZT48c2NyaXB0IGFzeW5jIHNyYz0iaHR0cHM6Ly9wbGF0Zm9ybS50d2l0dGVyLmNvbS93aWRnZXRzLmpzIiBjaGFyc2V0PSJ1dGYtOCI+PC9zY3JpcHQ+CgoKLSBLZWVwaW5nIHVwIHRvIGRhdGUgd2l0aCBSIG5ld3MgIApodHRwczovL21hc2FsbW9uLmV1LzIwMTkvMDEvMjUvdXB0b2RhdGUvICAKCi0tLQoKIyBSIHN0dWRpbyBpbGUgcHJvamUgb2x1xZ90dXJtYQoKaHR0cHM6Ly9zdXBwb3J0LnJzdHVkaW8uY29tL2hjL2VuLXVzL2FydGljbGVzLzIwMDUyNjIwNy1Vc2luZy1Qcm9qZWN0cwoKIVtdKGh0dHA6Ly93d3cucnN0dWRpby5jb20vaW1hZ2VzL2RvY3MvcHJvamVjdHNfbmV3LnBuZykKCi0tLQoKIyBSU3R1ZGlvIGlsZSB2ZXJpIHnDvGtsZW1lCgpodHRwczovL3N1cHBvcnQucnN0dWRpby5jb20vaGMvZW4tdXMvYXJ0aWNsZXMvMjE4NjExOTc3LUltcG9ydGluZy1EYXRhLXdpdGgtUlN0dWRpbwoKIVtdKGh0dHBzOi8vc3VwcG9ydC5yc3R1ZGlvLmNvbS9oYy9lbi11cy9hcnRpY2xlX2F0dGFjaG1lbnRzLzIwNjI3NzYxOC9kYXRhLWltcG9ydC1vdmVydmlldy5naWYpCgotLS0KCiMjIEV4Y2VsCgojIyBTUFNTCgojIyBjc3YKCgotLS0KCiMgVmVyaXlpIGfDtnLDvG50w7xsZW1lCgo8c2NyaXB0IGFzeW5jIHNyYz0iaHR0cHM6Ly9wbGF0Zm9ybS50d2l0dGVyLmNvbS93aWRnZXRzLmpzIiBjaGFyc2V0PSJ1dGYtOCI+PC9zY3JpcHQ+PGJsb2NrcXVvdGUgY2xhc3M9InR3aXR0ZXItdHdlZXQiIGRhdGEtbGFuZz0iZW4iPjxwIGxhbmc9ImVuIiBkaXI9Imx0ciI+U3ByZWFkc2hlZXQgdXNlcnMgdXNpbmcgPGEgaHJlZj0iaHR0cHM6Ly90d2l0dGVyLmNvbS9oYXNodGFnL3JzdGF0cz9zcmM9aGFzaCZhbXA7cmVmX3NyYz10d3NyYyU1RXRmdyI+I3JzdGF0czwvYT46ICB3aGVyZSYjMzk7cyB0aGUgZGF0YT88YSBocmVmPSJodHRwczovL3R3aXR0ZXIuY29tL2hhc2h0YWcvcnN0YXRzP3NyYz1oYXNoJmFtcDtyZWZfc3JjPXR3c3JjJTVFdGZ3Ij4jcnN0YXRzPC9hPiB1c2VycyB1c2luZyBzcHJlYWRzaGVldHM6ICB3aGVyZSYjMzk7cyB0aGUgY29kZT88L3A+Jm1kYXNoOyBMZW9uYXJkIEtpZWZlciAoQGxlbmtpZWZlcikgPGEgaHJlZj0iaHR0cHM6Ly90d2l0dGVyLmNvbS9sZW5raWVmZXIvc3RhdHVzLzEwMTU1ODc0NzU1ODA5NTY2NzI/cmVmX3NyYz10d3NyYyU1RXRmdyI+SnVseSA3LCAyMDE4PC9hPjwvYmxvY2txdW90ZT4KCgoKYGBge3IsIHJlc3VsdHM9Im1hcmt1cCJ9CiMgbGlicmFyeShueWNmbGlnaHRzMTMpCiMgc3VtbWFyeShmbGlnaHRzKQpgYGAKCgoKYGBgClZpZXcoZGF0YSkKYGBgCgoKYGBgCmRhdGEKYGBgCgoKYGBgCmhlYWQKYGBgCgoKYGBgCnRhaWwKYGBgCgoKYGBgCmdsaW1wc2UKYGBgCgoKYGBgCnN0cgpgYGAKCgpgYGAKc2tpbXI6OnNraW0oKQpgYGAKCi0tLQoKCiMgVmVyaXlpIGRlxJ9pxZ90aXJtZQoKIyMgVmVyaXlpIGtvZCBpbGUgZGXEn2nFn3RpcmVsaW0KCiMjIFZlcml5aSBla2xlbnRpbGVybGUgZGXEn2nFn3Rpcm1lCgohW10oZmlndXJlcy9jaGFuZ2VfZGF0YS5wbmcpCgoKLS0tCgoKIyMgUlN0dWRpbyBhcmFjxLFsxLHEn8SxeWxhIHJlY29kZQoKKnF1ZXN0aW9uciogcGFrZXRpIGt1bGxhbsSxbGFjYWsKCiFbXShmaWd1cmVzL2xldmVsX3JlY29kZS5wbmcpCgoKLS0tCgoKCmh0dHBzOi8vanViYS5naXRodWIuaW8vcXVlc3Rpb25yL2FydGljbGVzL3JlY29kaW5nX2FkZGlucy5odG1sCgoKIVtdKGh0dHBzOi8vcmF3LmdpdGh1YnVzZXJjb250ZW50LmNvbS9qdWJhL3F1ZXN0aW9uci9tYXN0ZXIvcmVzb3VyY2VzL3NjcmVlbnNob3RzL2lyZWNfMS5wbmcpCgoKLS0tCgohW10oaHR0cHM6Ly9yYXcuZ2l0aHVidXNlcmNvbnRlbnQuY29tL2p1YmEvcXVlc3Rpb25yL21hc3Rlci9yZXNvdXJjZXMvc2NyZWVuc2hvdHMvaXJlY18yLnBuZykKCgotLS0KCiFbXShodHRwczovL3Jhdy5naXRodWJ1c2VyY29udGVudC5jb20vanViYS9xdWVzdGlvbnIvbWFzdGVyL3Jlc291cmNlcy9zY3JlZW5zaG90cy9pcmVjXzMucG5nKQoKCi0tLQoKIyBCYXNpdCB0YW7EsW1sYXnEsWPEsSBpc3RhdGlzdGlrbGVyCgpgYGAKc3VtbWFyeSgpCmBgYAoKYGBgCm1lYW4KYGBgCgpgYGAKbWVkaWFuCmBgYAoKYGBgCm1pbgpgYGAKCmBgYAptYXgKYGBgCgpgYGAKc2QKYGBgCgpgYGAKdGFibGUoKQpgYGAKCgpgYGB7ciBkZXNjcmlwdGl2ZSwgZWNobz1UUlVFLCBpbmNsdWRlID0gVFJVRX0KbGlicmFyeShyZWFkcikKaXJpc2RhdGEgPC0gcmVhZF9jc3YoImRhdGEvaXJpcy5jc3YiKQoKam12OjpkZXNjcmlwdGl2ZXMoCiAgICBkYXRhID0gaXJpc2RhdGEsCiAgICB2YXJzID0gIlNlcGFsLkxlbmd0aCIsCiAgICBzcGxpdEJ5ID0gIlNwZWNpZXMiLAogICAgZnJlcSA9IFRSVUUsCiAgICBoaXN0ID0gVFJVRSwKICAgIGRlbnMgPSBUUlVFLAogICAgYmFyID0gVFJVRSwKICAgIGJveCA9IFRSVUUsCiAgICB2aW9saW4gPSBUUlVFLAogICAgZG90ID0gVFJVRSwKICAgIG1vZGUgPSBUUlVFLAogICAgc3VtID0gVFJVRSwKICAgIHNkID0gVFJVRSwKICAgIHZhcmlhbmNlID0gVFJVRSwKICAgIHJhbmdlID0gVFJVRSwKICAgIHNlID0gVFJVRSwKICAgIHNrZXcgPSBUUlVFLAogICAga3VydCA9IFRSVUUsCiAgICBxdWFydCA9IFRSVUUsCiAgICBwY0VxR3IgPSBUUlVFKQpgYGAKCi0tLQoKYGBge3Igc2NhdHRlciwgZWNobz1UUlVFLCBpbmNsdWRlPVRSVUV9CiMgaW5zdGFsbC5wYWNrYWdlcygic2NhdHIiKQoKc2NhdHI6OnNjYXQoCiAgICBkYXRhID0gaXJpc2RhdGEsCiAgICB4ID0gIlNlcGFsLkxlbmd0aCIsCiAgICB5ID0gIlNlcGFsLldpZHRoIiwKICAgIGdyb3VwID0gIlNwZWNpZXMiLAogICAgbWFyZyA9ICJkZW5zIiwKICAgIGxpbmUgPSAibGluZWFyIiwKICAgIHNlID0gVFJVRSkKCmBgYAoKIyMgc3VtbWFyeXRvb2xzCgpodHRwczovL2NyYW4uci1wcm9qZWN0Lm9yZy93ZWIvcGFja2FnZXMvc3VtbWFyeXRvb2xzL3ZpZ25ldHRlcy9JbnRyb2R1Y3Rpb24uaHRtbAoKYGBge3IsIGluY2x1ZGU9VFJVRSwgY29tbWVudD1OQSwgcHJvbXB0PUZBTFNFLCBjYWNoZT1GQUxTRSwgZWNobz1UUlVFLCByZXN1bHRzPSdhc2lzJ30KbGlicmFyeShzdW1tYXJ5dG9vbHMpCnN1bW1hcnl0b29sczo6ZnJlcShpcmlzJFNwZWNpZXMsIHN0eWxlID0gInJtYXJrZG93biIpCmBgYAoKYGBge3IsIGluY2x1ZGU9VFJVRSwgY29tbWVudD1OQSwgcHJvbXB0PUZBTFNFLCBjYWNoZT1GQUxTRSwgZWNobz1UUlVFLCByZXN1bHRzPSdhc2lzJ30Kc3VtbWFyeXRvb2xzOjpmcmVxKGlyaXMkU3BlY2llcywgcmVwb3J0Lm5hcyA9IEZBTFNFLCBzdHlsZSA9ICJybWFya2Rvd24iLCBvbWl0LmhlYWRpbmdzID0gVFJVRSkKYGBgCgpgYGB7ciwgaW5jbHVkZT1UUlVFLCBjb21tZW50PU5BLCBwcm9tcHQ9RkFMU0UsIGNhY2hlPUZBTFNFLCBlY2hvPVRSVUUsIHJlc3VsdHM9J2FzaXMnfQp3aXRoKHRvYmFjY28sIHByaW50KGN0YWJsZShzbW9rZXIsIGRpc2Vhc2VkKSwgbWV0aG9kID0gJ3JlbmRlcicpKQpgYGAKCgpgYGB7ciwgaW5jbHVkZT1UUlVFLCBjb21tZW50PU5BLCBwcm9tcHQ9RkFMU0UsIGNhY2hlPUZBTFNFLCBlY2hvPVRSVUUsIHJlc3VsdHM9J2FzaXMnfQp3aXRoKHRvYmFjY28sIAogICAgIHByaW50KGN0YWJsZShzbW9rZXIsIGRpc2Vhc2VkLCBwcm9wID0gJ24nLCB0b3RhbHMgPSBGQUxTRSksIAogICAgICAgICAgIG9taXQuaGVhZGluZ3MgPSBUUlVFLCBtZXRob2QgPSAicmVuZGVyIikpCmBgYAoKCgpgYGB7ciwgaW5jbHVkZT1UUlVFLCBjb21tZW50PU5BLCBwcm9tcHQ9RkFMU0UsIGNhY2hlPUZBTFNFLCBlY2hvPVRSVUUsIHJlc3VsdHM9J2FzaXMnfQpzdW1tYXJ5dG9vbHM6OmRlc2NyKGlyaXMsIHN0eWxlID0gInJtYXJrZG93biIpCmBgYAoKCgpgYGB7ciwgaW5jbHVkZT1UUlVFLCBjb21tZW50PU5BLCBwcm9tcHQ9RkFMU0UsIGNhY2hlPUZBTFNFLCBlY2hvPVRSVUUsIHJlc3VsdHM9J2FzaXMnfQpkZXNjcihpcmlzLCBzdGF0cyA9IGMoIm1lYW4iLCAic2QiLCAibWluIiwgIm1lZCIsICJtYXgiKSwgdHJhbnNwb3NlID0gVFJVRSwgCiAgICAgIG9taXQuaGVhZGluZ3MgPSBUUlVFLCBzdHlsZSA9ICJybWFya2Rvd24iKQpgYGAKCgoKYGBge3IsIGluY2x1ZGU9VFJVRSwgY29tbWVudD1OQSwgcHJvbXB0PUZBTFNFLCBjYWNoZT1GQUxTRSwgZWNobz1UUlVFLCByZXN1bHRzPSdhc2lzJ30KIyB2aWV3KGRmU3VtbWFyeShpcmlzKSkKCmBgYAoKCiFbXShmaWd1cmVzL2Rmc3VtbWFyeS5wbmcpCgoKCmBgYHtyLCBpbmNsdWRlPVRSVUUsIGNvbW1lbnQ9TkEsIHByb21wdD1GQUxTRSwgY2FjaGU9RkFMU0UsIGVjaG89VFJVRSwgcmVzdWx0cz0nYXNpcyd9CmRmU3VtbWFyeSh0b2JhY2NvLCBwbGFpbi5hc2NpaSA9IEZBTFNFLCBzdHlsZSA9ICJncmlkIikKYGBgCgoKYGBge3IsIGluY2x1ZGU9VFJVRSwgY29tbWVudD1OQSwgcHJvbXB0PUZBTFNFLCBjYWNoZT1GQUxTRSwgZWNobz1UUlVFLCByZXN1bHRzPSdhc2lzJ30KCiMgRmlyc3Qgc2F2ZSB0aGUgcmVzdWx0cwoKaXJpc19zdGF0c19ieV9zcGVjaWVzIDwtIGJ5KGRhdGEgPSBpcmlzLCAKICAgICAgICAgICAgICAgICAgICAgICAgICAgIElORElDRVMgPSBpcmlzJFNwZWNpZXMsIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgRlVOID0gZGVzY3IsIHN0YXRzID0gYygibWVhbiIsICJzZCIsICJtaW4iLCAibWVkIiwgIm1heCIpLCAKICAgICAgICAgICAgICAgICAgICAgICAgICAgIHRyYW5zcG9zZSA9IFRSVUUpCgojIFRoZW4gdXNlIHZpZXcoKSwgbGlrZSBzbzoKCnZpZXcoaXJpc19zdGF0c19ieV9zcGVjaWVzLCBtZXRob2QgPSAicGFuZGVyIiwgc3R5bGUgPSAicm1hcmtkb3duIikKYGBgCgpgYGB7ciwgaW5jbHVkZT1UUlVFLCBjb21tZW50PU5BLCBwcm9tcHQ9RkFMU0UsIGNhY2hlPUZBTFNFLCBlY2hvPVRSVUUsIHJlc3VsdHM9J2FzaXMnfQojIHZpZXcoaXJpc19zdGF0c19ieV9zcGVjaWVzKQpgYGAKCiFbXShmaWd1cmVzL0Rlc2NyaXB0aXZlU3RhdGlzdGljcy5wbmcpCgotLS0KCmBgYHtyLCBpbmNsdWRlPVRSVUUsIGNvbW1lbnQ9TkEsIHByb21wdD1GQUxTRSwgY2FjaGU9RkFMU0UsIGVjaG89VFJVRSwgcmVzdWx0cz0nYXNpcyd9CmRhdGEodG9iYWNjbykgIyB0b2JhY2NvIGlzIGFuIGV4YW1wbGUgZGF0YWZyYW1lIGluY2x1ZGVkIGluIHRoZSBwYWNrYWdlCkJNSV9ieV9hZ2UgPC0gd2l0aCh0b2JhY2NvLCAKICAgICAgICAgICAgICAgICAgIGJ5KEJNSSwgYWdlLmdyLCBkZXNjciwgCiAgICAgICAgICAgICAgICAgICAgICBzdGF0cyA9IGMoIm1lYW4iLCAic2QiLCAibWluIiwgIm1lZCIsICJtYXgiKSkpCnZpZXcoQk1JX2J5X2FnZSwgInBhbmRlciIsIHN0eWxlID0gInJtYXJrZG93biIpCmBgYAoKLS0tCgpgYGB7ciwgaW5jbHVkZT1UUlVFLCBjb21tZW50PU5BLCBwcm9tcHQ9RkFMU0UsIGNhY2hlPUZBTFNFLCBlY2hvPVRSVUUsIHJlc3VsdHM9J2FzaXMnfQpCTUlfYnlfYWdlIDwtIHdpdGgodG9iYWNjbywgCiAgICAgICAgICAgICAgICAgICBieShCTUksIGFnZS5nciwgZGVzY3IsICB0cmFuc3Bvc2UgPSBUUlVFLAogICAgICAgICAgICAgICAgICAgICAgc3RhdHMgPSBjKCJtZWFuIiwgInNkIiwgIm1pbiIsICJtZWQiLCAibWF4IikpKQoKdmlldyhCTUlfYnlfYWdlLCAicGFuZGVyIiwgc3R5bGUgPSAicm1hcmtkb3duIiwgb21pdC5oZWFkaW5ncyA9IFRSVUUpCmBgYAoKLS0tCgpgYGB7ciwgaW5jbHVkZT1UUlVFLCBjb21tZW50PU5BLCBwcm9tcHQ9RkFMU0UsIGNhY2hlPUZBTFNFLCBlY2hvPVRSVUUsIHJlc3VsdHM9J2FzaXMnfQp0b2JhY2NvX3N1YnNldCA8LSB0b2JhY2NvWyAsYygiZ2VuZGVyIiwgImFnZS5nciIsICJzbW9rZXIiKV0KZnJlcV90YWJsZXMgPC0gbGFwcGx5KHRvYmFjY29fc3Vic2V0LCBmcmVxKQoKIyB2aWV3KGZyZXFfdGFibGVzLCBmb290bm90ZSA9IE5BLCBmaWxlID0gJ2ZyZXEtdGFibGVzLmh0bWwnKQpgYGAKCi0tLQoKYGBge3IsIGluY2x1ZGU9VFJVRSwgY29tbWVudD1OQSwgcHJvbXB0PUZBTFNFLCBjYWNoZT1GQUxTRSwgZWNobz1UUlVFLCByZXN1bHRzPSdhc2lzJ30Kd2hhdC5pcyhpcmlzKQpgYGAKCi0tLQoKYGBge3J9CmZyZXEodG9iYWNjbyRnZW5kZXIsIHN0eWxlID0gJ3JtYXJrZG93bicpCmBgYAoKLS0tCgpgYGB7cn0KcHJpbnQoZnJlcSh0b2JhY2NvJGdlbmRlciksIG1ldGhvZCA9ICdyZW5kZXInKQpgYGAKCi0tLQoKIyMgc2tpbXIKCmBgYApsaWJyYXJ5KHNraW1yKQpza2ltKGRmKQpgYGAKCi0tLQoKIyMgRGF0YUV4cGxvcmVyCgpgYGAKbGlicmFyeShEYXRhRXhwbG9yZXIpCkRhdGFFeHBsb3Jlcjo6Y3JlYXRlX3JlcG9ydChkZikKYGBgCgoKWyFbXShodHRwczovL3N0YXRpYzEuc3F1YXJlc3BhY2UuY29tL3N0YXRpYy81OGVlZjg4NDZhNDk2M2U0Mjk2ODdhNGQvdC81YmRmYzJmYjRkN2E5YzA0ZWU1MGI3YWEvMTU0MTM5MTE2MDcwMi9kYXRhRXhwbG9yZXJHaWZMZy5naWY/Zm9ybWF0PTE1MDB3KV0oaHR0cHM6Ly93d3cubGl0dGxlbWlzc2RhdGEuY29tL2Jsb2cvc2ltcGxlLWVkYSkKCgoKLS0tCgojIyBHcmFmaWtsZXIKCmBgYHtyfQojIGxpYnJhcnkoZ2dwbG90MikKIyBsaWJyYXJ5KG1vc2FpYykKIyBtUGxvdChpcmlzZGF0YSkKYGBgCgotLS0KCgpgYGB7ciwgcmVzdWx0cz0iYXNpcyJ9CmN0YWJsZSh0b2JhY2NvJGdlbmRlciwgdG9iYWNjbyRzbW9rZXIsIHN0eWxlID0gJ3JtYXJrZG93bicpCmBgYAoKLS0tCgoKYGBge3J9CnByaW50KGN0YWJsZSh0b2JhY2NvJGdlbmRlciwgdG9iYWNjbyRzbW9rZXIpLCBtZXRob2QgPSAncmVuZGVyJykKYGBgCgpgYGAKZGVzY3IodG9iYWNjbywgc3R5bGUgPSAncm1hcmtkb3duJykKCnByaW50KGRlc2NyKHRvYmFjY28pLCBtZXRob2QgPSAncmVuZGVyJywgdGFibGUuY2xhc3NlcyA9ICdzdC1zbWFsbCcpCgpkZlN1bW1hcnkodG9iYWNjbywgc3R5bGUgPSAnZ3JpZCcsIHBsYWluLmFzY2lpID0gRkFMU0UpCgpwcmludChkZlN1bW1hcnkodG9iYWNjbywgZ3JhcGgubWFnbmlmID0gMC43NSksIG1ldGhvZCA9ICdyZW5kZXInKQpgYGAKCgotLS0KCgoKPGJsb2NrcXVvdGUgY2xhc3M9InR3aXR0ZXItdHdlZXQiIGRhdGEtbGFuZz0iZW4iPjxwIGxhbmc9ImVuIiBkaXI9Imx0ciI+SGVyZSwgYnVpbGRpbmcgdXAgYSA8YSBocmVmPSJodHRwczovL3R3aXR0ZXIuY29tL2hhc2h0YWcvZ2dwbG90Mj9zcmM9aGFzaCZhbXA7cmVmX3NyYz10d3NyYyU1RXRmdyI+I2dncGxvdDI8L2E+IGFzIHNsb3dseSBhcyBwb3NzaWJsZSwgPGEgaHJlZj0iaHR0cHM6Ly90d2l0dGVyLmNvbS9oYXNodGFnL3JzdGF0cz9zcmM9aGFzaCZhbXA7cmVmX3NyYz10d3NyYyU1RXRmdyI+I3JzdGF0czwvYT4uICBJbmNyZW1lbnRhbCBhZGp1c3RtZW50cy4gIDxhIGhyZWY9Imh0dHBzOi8vdHdpdHRlci5jb20vaGFzaHRhZy9yc3RhdHN0ZWFjaGluZ2lkZWFzP3NyYz1oYXNoJmFtcDtyZWZfc3JjPXR3c3JjJTVFdGZ3Ij4jcnN0YXRzdGVhY2hpbmdpZGVhczwvYT4gPGEgaHJlZj0iaHR0cHM6Ly90LmNvL25VdWxRbDhiUGgiPnBpYy50d2l0dGVyLmNvbS9uVXVsUWw4YlBoPC9hPjwvcD4mbWRhc2g7IEdpbmEgUmV5bm9sZHMgKEBFdmFNYWVSZXkpIDxhIGhyZWY9Imh0dHBzOi8vdHdpdHRlci5jb20vRXZhTWFlUmV5L3N0YXR1cy8xMDI5MTA0NjU2NzYzNTcyMjI2P3JlZl9zcmM9dHdzcmMlNUV0ZnciPkF1Z3VzdCAxMywgMjAxODwvYT48L2Jsb2NrcXVvdGU+PHNjcmlwdCBhc3luYyBzcmM9Imh0dHBzOi8vcGxhdGZvcm0udHdpdHRlci5jb20vd2lkZ2V0cy5qcyIgY2hhcnNldD0idXRmLTgiPjwvc2NyaXB0PgoKCi0tLQoKClshW10oaHR0cHM6Ly9yYXcuZ2l0aHVidXNlcmNvbnRlbnQuY29tL2RyZWFtUnMvZXNxdWlzc2UvbWFzdGVyL21hbi9maWd1cmVzL2VzcXVpc3NlLmdpZildKGh0dHBzOi8vZ2l0aHViLmNvbS9kcmVhbVJzL2VzcXVpc3NlKQoKCjxibG9ja3F1b3RlIGNsYXNzPSJ0d2l0dGVyLXR3ZWV0IiBkYXRhLWxhbmc9ImVuIj48cCBsYW5nPSJlbiIgZGlyPSJsdHIiPkRyZWFtaW5nIG9mIGEgZmFuY3kgPGEgaHJlZj0iaHR0cHM6Ly90d2l0dGVyLmNvbS9oYXNodGFnL1JzdGF0cz9zcmM9aGFzaCZhbXA7cmVmX3NyYz10d3NyYyU1RXRmdyI+I1JzdGF0czwvYT4gPGEgaHJlZj0iaHR0cHM6Ly90d2l0dGVyLmNvbS9oYXNodGFnL2dncGxvdD9zcmM9aGFzaCZhbXA7cmVmX3NyYz10d3NyYyU1RXRmdyI+I2dncGxvdDwvYT4gPGEgaHJlZj0iaHR0cHM6Ly90d2l0dGVyLmNvbS9oYXNodGFnL2RhdGF2aXo/c3JjPWhhc2gmYW1wO3JlZl9zcmM9dHdzcmMlNUV0ZnciPiNkYXRhdml6PC9hPiBidXQgc3RpbGwgc2NhcmVkIG9mIHR5cGluZyA8YSBocmVmPSJodHRwczovL3R3aXR0ZXIuY29tL2hhc2h0YWcvY29kZT9zcmM9aGFzaCZhbXA7cmVmX3NyYz10d3NyYyU1RXRmdyI+I2NvZGU8L2E+PyA8YSBocmVmPSJodHRwczovL3R3aXR0ZXIuY29tL19wdmljdG9ycj9yZWZfc3JjPXR3c3JjJTVFdGZ3Ij5AX3B2aWN0b3JyPC9hPiBlc3F1aXNzZSBwYWNrYWdlIGhhcyB5b3UgY292ZXJlZCA8YSBocmVmPSJodHRwczovL3QuY28vMXZJRFhjVkFBRiI+aHR0cHM6Ly90LmNvLzF2SURYY1ZBQUY8L2E+IDxhIGhyZWY9Imh0dHBzOi8vdC5jby9SbFRrcHRuck52Ij5waWMudHdpdHRlci5jb20vUmxUa3B0bnJOdjwvYT48L3A+Jm1kYXNoOyBSYWRvc2xhdyBQYW5jemFrIChAUlBhbmN6YWspIDxhIGhyZWY9Imh0dHBzOi8vdHdpdHRlci5jb20vUlBhbmN6YWsvc3RhdHVzLzEwNDcwMTk1ODg2NTgwNDA4MzI/cmVmX3NyYz10d3NyYyU1RXRmdyI+T2N0b2JlciAyLCAyMDE4PC9hPjwvYmxvY2txdW90ZT4KPHNjcmlwdCBhc3luYyBzcmM9Imh0dHBzOi8vcGxhdGZvcm0udHdpdHRlci5jb20vd2lkZ2V0cy5qcyIgY2hhcnNldD0idXRmLTgiPjwvc2NyaXB0PgoKCi0tLQoKIyMgVGFibG9sYXIKCgoKCgoKCi0tLQoKIyBCYXrEsSBhcmF5w7x6bGVyCgpMaW5rCgojIyBSY21kcgoKYGBgCmxpYnJhcnkoUmNtZHIpCgpSY21kcjo6Q29tbWFuZGVyKCkKCmBgYAoKCi0gQSBDb21wYXJhdGl2ZSBSZXZpZXcgb2YgdGhlIFIgQ29tbWFuZGVyIEdVSSBmb3IgUgoKaHR0cDovL3I0c3RhdHMuY29tL2FydGljbGVzL3NvZnR3YXJlLXJldmlld3Mvci1jb21tYW5kZXIvCgoKLS0tCgojIyBqYW1vdmkKCmh0dHBzOi8vd3d3LmphbW92aS5vcmcvCgohWyFbXShodHRwczovL3d3dy5qYW1vdmkub3JnL2Fzc2V0cy9tYWluLXNjcmVlbnNob3QucG5nKV0oaHR0cHM6Ly93d3cuamFtb3ZpLm9yZy8pCgoKaHR0cHM6Ly9ibG9nLmphbW92aS5vcmcvMjAxOC8wNy8zMC9yai5odG1sCgohWyFbXShodHRwczovL2Jsb2cuamFtb3ZpLm9yZy9hc3NldHMvaW1hZ2VzL3JqLnBuZyldKGh0dHBzOi8vYmxvZy5qYW1vdmkub3JnLzIwMTgvMDcvMzAvcmouaHRtbCkKCi0tLQoKIyBSIG5lcmVkZW4gw7bEn3JlbmlsaXIKCgotLS0KCiMgU29ucmFraSBLb251bGFyCgotIFJTdHVkaW8gaWxlIEdpdEh1YgotIEhpcG90ZXogdGVzdGxlcmkKLSBSIE1hcmtkb3duIHZlIFIgTm90ZWJvb2sgaWxlIHRla3JhcmxhbmFiaWxpciByYXBvcgoKCi0tLS0tCgojIEdlcmkgQmlsZGlyaW0KCi0gR2VyaSBiaWxkaXJpbSBpw6dpbiB0xLFrbGF5xLFuxLF6OiBfW0dlcmkgYmlsZGlyaW0gZm9ybXVdKGh0dHBzOi8vZ29vLmdsL2Zvcm1zL1lqR1o1REhndFBsUjFSbkIzKV8KCgotLS0KCjxzY3JpcHQgaWQ9ImRzcS1jb3VudC1zY3IiIHNyYz0iLy9odHRwcy1zYmFsY2ktZ2l0aHViLWlvLmRpc3F1cy5jb20vY291bnQuanMiIGFzeW5jPjwvc2NyaXB0PgoKPGRpdiBpZD0iZGlzcXVzX3RocmVhZCI+PC9kaXY+CjxzY3JpcHQ+CgovKioKKiAgUkVDT01NRU5ERUQgQ09ORklHVVJBVElPTiBWQVJJQUJMRVM6IEVESVQgQU5EIFVOQ09NTUVOVCBUSEUgU0VDVElPTiBCRUxPVyBUTyBJTlNFUlQgRFlOQU1JQyBWQUxVRVMgRlJPTSBZT1VSIFBMQVRGT1JNIE9SIENNUy4KKiAgTEVBUk4gV0hZIERFRklOSU5HIFRIRVNFIFZBUklBQkxFUyBJUyBJTVBPUlRBTlQ6IGh0dHBzOi8vZGlzcXVzLmNvbS9hZG1pbi91bml2ZXJzYWxjb2RlLyNjb25maWd1cmF0aW9uLXZhcmlhYmxlcyovCi8qCnZhciBkaXNxdXNfY29uZmlnID0gZnVuY3Rpb24gKCkgewp0aGlzLnBhZ2UudXJsID0gUEFHRV9VUkw7ICAvLyBSZXBsYWNlIFBBR0VfVVJMIHdpdGggeW91ciBwYWdlJ3MgY2Fub25pY2FsIFVSTCB2YXJpYWJsZQp0aGlzLnBhZ2UuaWRlbnRpZmllciA9IFBBR0VfSURFTlRJRklFUjsgLy8gUmVwbGFjZSBQQUdFX0lERU5USUZJRVIgd2l0aCB5b3VyIHBhZ2UncyB1bmlxdWUgaWRlbnRpZmllciB2YXJpYWJsZQp9OwoqLwooZnVuY3Rpb24oKSB7IC8vIERPTidUIEVESVQgQkVMT1cgVEhJUyBMSU5FCnZhciBkID0gZG9jdW1lbnQsIHMgPSBkLmNyZWF0ZUVsZW1lbnQoJ3NjcmlwdCcpOwpzLnNyYyA9ICdodHRwczovL2h0dHBzLXNiYWxjaS1naXRodWItaW8uZGlzcXVzLmNvbS9lbWJlZC5qcyc7CnMuc2V0QXR0cmlidXRlKCdkYXRhLXRpbWVzdGFtcCcsICtuZXcgRGF0ZSgpKTsKKGQuaGVhZCB8fCBkLmJvZHkpLmFwcGVuZENoaWxkKHMpOwp9KSgpOwo8L3NjcmlwdD4KPG5vc2NyaXB0PlBsZWFzZSBlbmFibGUgSmF2YVNjcmlwdCB0byB2aWV3IHRoZSA8YSBocmVmPSJodHRwczovL2Rpc3F1cy5jb20vP3JlZl9ub3NjcmlwdCI+Y29tbWVudHMgcG93ZXJlZCBieSBEaXNxdXMuPC9hPjwvbm9zY3JpcHQ+CgotLS0KCgpccGFnZWJyZWFrCgotLS0KCmBgYAojIFNhdmUgRmluYWwgRGF0YQoKc2F2ZWQgZGF0YSBhZnRlciBhbmFseXNpcyB0byBgRGF0YS1BZnRlci1BbmFseXNpcy54bHN4YC4KCnNhdmVSRFMobXlkYXRhLCAiRGF0YS1BZnRlci1BbmFseXNpcy5yZHMiKQoKd3JpdGV4bDo6d3JpdGVfeGxzeChteWRhdGEsICJEYXRhLUFmdGVyLUFuYWx5c2lzLnhsc3giKQoKZmlsZS5pbmZvKCJEYXRhLUFmdGVyLUFuYWx5c2lzLnhsc3giKSRjdGltZQoKYGBgCgotLS0KClxwYWdlYnJlYWsKCgojIExpYnJhcmllcyBVc2VkCgpgYGB7cn0KY2l0YXRpb24oKQpgYGAKCmBgYApjaXRhdGlvbigidGlkeXZlcnNlIikKY2l0YXRpb24oImZvcmVpZ24iKQpjaXRhdGlvbigidGlkeWxvZyIpCmNpdGF0aW9uKCJqYW5pdG9yIikKY2l0YXRpb24oImptdiIpCmNpdGF0aW9uKCJ0YW5ncmFtIikKY2l0YXRpb24oImZpbmFsZml0IikKY2l0YXRpb24oInN1bW1hcnl0b29scyIpCmNpdGF0aW9uKCJnZ3N0YXRwbG90IikKY2l0YXRpb24oInJlYWR4bCIpCmBgYAoKCmBgYHtyIGV2YWw9RkFMU0UsIGluY2x1ZGU9RkFMU0V9CmNpdGF0aW9uKCJ0aWR5dmVyc2UiKQpjaXRhdGlvbigiZm9yZWlnbiIpCmNpdGF0aW9uKCJ0aWR5bG9nIikKY2l0YXRpb24oImphbml0b3IiKQpjaXRhdGlvbigiam12IikKY2l0YXRpb24oInRhbmdyYW0iKQpjaXRhdGlvbigiZmluYWxmaXQiKQpjaXRhdGlvbigic3VtbWFyeXRvb2xzIikKY2l0YXRpb24oImdnc3RhdHBsb3QiKQpjaXRhdGlvbigicmVhZHhsIikKYGBgCgoKLS0tCgoKYGBge3IsIHJlc3VsdHM9J2FzaXMnfQpyZXBvcnQ6OmNpdGVfcGFja2FnZXMoc2Vzc2lvbiA9IHNlc3Npb25JbmZvKCkpCmBgYAoKCi0tLQoKCgpgYGB7cn0Kc2Vzc2lvbkluZm8oKQpgYGAKCi0tLQoKXHBhZ2VicmVhawoKCgojIE5vdGVzICAKCkNvbXBsZXRlZCBvbiBgciBTeXMudGltZSgpYC4gIAoKU2VyZGFyIEJhbGNpLCBNRCwgUGF0aG9sb2dpc3QgIApkICByc2VyZGFyYmFsY2lAZ21haWwuY29tICAKaHR0cHM6Ly9ycHVicy5jb20vc2JhbGNpL0NWICAgCgogIApodHRwczovL3NiYWxjaS5naXRodWIuaW8vICAKaHR0cHM6Ly9naXRodWIuY29tL3NiYWxjaSAgCi0tLQoKCgoK

R ile analize başlarken1

Derleyen Serdar Balcı, MD, Pathologist

2019-04-20

1 R yükleme

1.1 R-project

1.2 RStudio

1.2.1 RStudio eklentileri

1.3 X11

1.4 Java OS

2 R zor şeyler için kolay, kolay şeyler için zor

3 R paketleri

3.1 Neden paketler var

3.2 Paketleri nereden bulabiliriz

3.3 Kendi paket evrenini oluştur

3.4 R paket yükleme

4 R için yardım bulma

5 R studio ile proje oluşturma

6 RStudio ile veri yükleme

6.1 Excel

6.2 SPSS

6.3 csv

7 Veriyi görüntüleme

8 Veriyi değiştirme

8.1 Veriyi kod ile değiştirelim

8.2 Veriyi eklentilerle değiştirme

8.3 RStudio aracılığıyla recode

9 Basit tanımlayıcı istatistikler

9.1 summarytools

9.1.1 Frequencies

9.1.1.1 iris$Species

Cross-Tabulation, Row Proportions

smoker * diseased

9.1.2 Descriptive Statistics

9.1.2.1 BMI by age.gr

Frequencies

tobacco$gender

9.2 skimr

9.3 DataExplorer

9.4 Grafikler

9.4.1 Cross-Tabulation, Row Proportions

9.4.1.1 gender * smoker

Cross-Tabulation, Row Proportions

gender * smoker

9.5 Tablolar

10 Bazı arayüzler

10.1 Rcmdr

10.2 jamovi

11 R nereden öğrenilir

12 Sonraki Konular

13 Geri Bildirim

14 Libraries Used

15 Notes

R ile analize başlarken¹